import time

AT
WAIT FOR OK
AT+FCLASS=0
WAIT FOR OK
AT^SQWE=2
WAIT FOR OK

COM Request quality of service
COM Paramters: "IP", precedence, delay class, reliability, peak throughput class, mean througput class 
AT+CGQREQ=1,3,4,3,5,31
WAIT FOR OK

COM Define PDP content
COM Parameters: <cid> PDP context ID, PDP_TYPE, Access Point Name
AT+CGDCONT=1,"IP","web.vodafone.de"
WAIT FOR OK

COM define PPP authentication; 3=PAP & CHAP (obsolet?)
AT^SGAUTH=3
WAIT FOR OK

ATS0=0
WAIT FOR OK
AT
WAIT FOR OK
AT+FCLASS=0
WAIT FOR OK
AT^SQWE=2
WAIT FOR OK
AT+cgqreq=1,3,4,3,7,31
WAIT FOR OK
AT^SGAUTH=3
WAIT FOR OK
ATCMD(1,'ATD*99***1#')
WAIT FOR CONNECT
time.sleep(5000)
ATCMD(1,'+++')
WAIT FOR OK
MESSAGE('Please powercycle mobile!')